home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 February: Tool Chest / Apple Developer CD Series Tool Chest February 1996 (Apple Computer)(1996).iso / Sample Code / AOCE Sample Code / PowerTalk Access Modules / Sample PMSAM / PMSAM Framework / Common / CRecordID.cp < prev    next >
Encoding:
Text File  |  1995-07-28  |  10.2 KB  |  487 lines  |  [TEXT/MPS ]
  1. /*
  2.     File:        CRecordID.cp
  3.  
  4.     Contains:    xxx put contents here xxx
  5.  
  6.     Written by:    Tim Harnett
  7.  
  8.     Copyright:    © 1994 by Apple Computer, Inc., all rights reserved.
  9.  
  10.     Change History (most recent first):
  11.  
  12.          <7>     2/27/95    TMH        adapt to use ETO16 universal headers
  13.          <6>     2/17/95    TMH        added CRecordID(short pcatDSRefNum,StringPtr recName,StringPtr
  14.                                     recType)
  15.          <5>     2/14/95    CL        remove globals
  16.          <4>    10/18/94    TMH        added PackKeyChainRID
  17.          <3>    10/13/94    TMH        use GetDSRefNum(), big bug fix
  18.          <2>    10/11/94    TMH        added CRecordID(short pcatDSRefNum,char* recName,char* recType)
  19.          <1>     9/20/94    TMH        Abandon RoadsideRest embrace Mercury
  20.          <2>     6/14/94    TMH        added RecordID* rid assignment operator
  21.                   4/5/94    TMH        xxx put comment here xxx
  22.  
  23.     To Do:
  24. */
  25.  
  26.  
  27. #ifndef __OCE__
  28. #include "OCE.h"
  29. #endif
  30.  
  31. #ifndef __OCEAUTHDIR__
  32. #include "OCEAuthDir.h"
  33. #endif
  34.  
  35. #ifndef __Globals__
  36. #include "Globals.h"
  37. #endif
  38.  
  39.  
  40. #ifndef __CRecordID__
  41. #include "CRecordID.h"
  42. #endif
  43.  
  44. #ifndef __CAttribute__
  45. #include "CAttribute.h"
  46. #endif
  47.  
  48.  
  49.  
  50. //----------------------
  51. //    C P a c k e d R L I
  52. //----------------------
  53.  
  54.  
  55. //-------------------------
  56. //    C R e c o r d I D 
  57. //-------------------------
  58.  
  59.  
  60. //------------------------------------------------------------------------------------------
  61. CRecordID::CRecordID(short pcatDSRefNum, CreationID cid) 
  62. {
  63.     this->Initialize();
  64.     fCID = cid;
  65.     
  66.     
  67.     _fPackedRLI.fDSRefNum = pcatDSRefNum;
  68.         
  69. }
  70.  
  71. //------------------------------------------------------------------------------------------
  72. CRecordID::CRecordID(short pcatDSRefNum,char* recName,char* recType) 
  73. {
  74.     this->Initialize();    
  75.     
  76.     _fRecordName = recName;
  77.     _fRecordType = recType;
  78.     
  79.     _fPackedRLI.fDSRefNum = pcatDSRefNum;
  80.         
  81. }
  82.  
  83. //------------------------------------------------------------------------------------------
  84. CRecordID::CRecordID(short pcatDSRefNum,StringPtr recName,StringPtr recType) 
  85. {
  86.     this->Initialize();    
  87.     
  88.     _fRecordName = recName;
  89.     _fRecordType = recType;
  90.     
  91.     _fPackedRLI.fDSRefNum = pcatDSRefNum;
  92.         
  93. }
  94.  
  95.  
  96. //------------------------------------------------------------------------------------------
  97. CRecordID::CRecordID(CRecordID& cRID)
  98. {
  99.         // Caution should work with a RecordID* cast to be CRecordID&
  100.     this->Initialize();
  101.     
  102.     if( cRID.fName != 0 )
  103.         _fRecordName = *cRID.fName;
  104.         
  105.     if( cRID.fType != 0 )
  106.         _fRecordType = *cRID.fType;
  107.  
  108.     fCID = cRID.fCID;
  109.     BlockMove(cRID.fRLI,fRLI,sizeof(CPackedRLI));
  110. }
  111.  
  112.  
  113.  
  114. //------------------------------------------------------------------------------------------
  115. CRecordID::CRecordID(PackedDSSpecPtr packedDSSpec)
  116. {
  117.     extern DNodeNum MapPathNameToDNode(RLI *aRLI,short dsRefNum);        // From ADASUtils.h
  118.  
  119.     
  120.     this->Initialize();
  121.  
  122.     this->SetFromPackedDSSpec(packedDSSpec);
  123.  
  124. }
  125.  
  126.  
  127. //------------------------------------------------------------------------------------------
  128. CRecordID::CRecordID(CRLI& rli,CRecordName& recordName,CRecordType& recordType)
  129. {
  130.     this->Initialize();
  131.     
  132.     OCEPackRLI((RLI*)&rli,*fRLI,sizeof(CPackedRLI));
  133.     
  134.     _fRecordName = recordName;
  135.     _fRecordType = recordType;
  136.     
  137. }
  138.  
  139.  
  140. //------------------------------------------------------------------------------------------
  141. CRecordID::CRecordID(short dsRefNum, PackedRecordID* packedRecordID)
  142. {
  143.     this->Initialize();
  144.  
  145.     RecordID            rid;
  146.     OCEUnpackRecordID(packedRecordID,&rid);
  147.     
  148.     _fRecordName = rid.local.recordName;    // copy
  149.         
  150.     _fRecordType = rid.local.recordType;   // copy
  151.     
  152.     fCID = rid.local.cid;
  153.  
  154.     _fPackedRLI.fDSRefNum = dsRefNum;
  155.  
  156. }
  157.  
  158.  
  159.  
  160. //------------------------------------------------------------------------------------------
  161. void CRecordID::Initialize()
  162. {
  163.     memset(this,0,sizeof(CRecordID));
  164.     
  165.     fRLI = &_fPackedRLI;
  166.     fName = &_fRecordName;
  167.     fType = &_fRecordType;
  168.     
  169. }
  170.  
  171.  
  172.  
  173.  
  174. //------------------------------------------------------------------------------------------
  175. CRecordID& CRecordID::operator =(CRecordID& cRID)
  176. {
  177.     if( cRID.fName != 0 )
  178.         _fRecordName = *cRID.fName;
  179.         
  180.     if( cRID.fType != 0 )
  181.         _fRecordType = *cRID.fType;
  182.  
  183.     fCID = cRID.fCID;
  184.     BlockMove(cRID.fRLI,fRLI,sizeof(CPackedRLI));
  185.     return    *this;
  186. }
  187.  
  188.  
  189.  
  190. //------------------------------------------------------------------------------------------
  191. CRecordID& CRecordID::operator =(RecordID* rid)
  192. {
  193.     if( rid->local.recordName != 0 )
  194.         _fRecordName = rid->local.recordName;
  195.         
  196.     if( rid->local.recordType != 0 )
  197.         _fRecordType = rid->local.recordType;
  198.  
  199.     fCID = rid->local.cid;
  200.     BlockMove(rid->rli,fRLI,sizeof(CPackedRLI));
  201.     return    *this;
  202. }
  203.  
  204.  
  205. //-------------------------------------------------------------
  206. KeyChainPackedRIDPtr    CRecordID::PackKeyChainRID(KeyChainPackedRIDPtr pRID)
  207. { 
  208.     RecordID rid;
  209.     rid.rli = 0;
  210.     rid.local.recordName = 0;
  211.     rid.local.recordType = 0;
  212.     rid.local.cid.source = fCID.source;
  213.     rid.local.cid.seq = fCID.seq;
  214.     
  215.     OCEPackRecordID(&rid,(PackedRecordID*) pRID, kKeyChainPackedRIDSize);
  216.     
  217.     return pRID;
  218.     
  219.  }
  220.  
  221. //-------------------------------------------------------------
  222. void CRecordID::SetFromPackedDSSpec(PackedDSSpecPtr packedDSSpec)
  223. {
  224.     extern DNodeNum MapPathNameToDNode(RLI *aRLI,short dsRefNum);        // From ADASUtils.h
  225.  
  226.     RecordID            aRID;
  227.     DSSpec            dsspec;
  228.  
  229.     OCEUnpackDSSpec(packedDSSpec, &dsspec, &aRID);
  230.     
  231.     RLI            aRLI;
  232.     OCEUnpackRLI (aRID.rli, &aRLI);
  233.         
  234.     if( aRLI.dNodeNumber == 0 )     // if it is a packed pathname map it to the dNodeNumber.
  235.         MapPathNameToDNode(&aRLI,0);        // not well tested
  236.  
  237.  
  238.         //    copy the values
  239.         
  240.         
  241.     if( aRLI.dNodeNumber != 0 ) {
  242.         _fPackedRLI = &aRLI;
  243.         _fRecordName = aRID.local.recordName;
  244.         _fRecordType = aRID.local.recordType;
  245.         fCID = aRID.local.cid;
  246.     }
  247.     
  248. }
  249.  
  250.  
  251.  
  252. //-------------------------------------------------------------
  253. OSErr CRecordID::GetNameAndType()
  254. {
  255.     //    CAUTION! This may change the name of this record.
  256.     DirGetNameAndTypePB    pb;
  257.     memset(&pb, 0, sizeof(DirGetNameAndTypePB));                // Build Packed Path Name from dNodePath
  258.  
  259.     
  260.     pb.dsRefNum = this->GetDSRefNum();
  261.     pb.identity = gIdentity;
  262.  
  263.     long nilHint = 0;
  264.     pb.serverHint = *(AddrBlock*)&nilHint;
  265.  
  266.     pb.ioCompletion = nil;
  267.  
  268.     pb.aRecord = *this;
  269.     
  270.     return DirGetNameAndType((DirParamBlock*)&pb, false);
  271.  
  272. }
  273.  
  274.  
  275. //-------------------------------------------------------------
  276. OSErr CRecordID::SetNameAndType( Boolean allowDups)
  277. {
  278.     //    CAUTION! This may change the name of this record.
  279.     DirSetNameAndTypePB    pb;
  280.     
  281.     pb.dsRefNum = this->GetDSRefNum();
  282.     pb.identity = gIdentity;
  283.  
  284.     long nilHint = 0;
  285.     pb.serverHint = *(AddrBlock*)&nilHint;
  286.  
  287.     pb.ioCompletion = nil;
  288.  
  289.     pb.aRecord = *this;
  290.     pb.allowDuplicate = allowDups;
  291.     pb.newName = (RString*)&_fRecordName;
  292.     pb.newType = (RString*)&_fRecordType;
  293.     
  294.     return DirSetNameAndType((DirParamBlock*)&pb, false);
  295.  
  296. }
  297.  
  298.  
  299. //-------------------------------------------------------------
  300. OSErr CRecordID::AddAsPseudoNym(Boolean allowDuplicate)
  301. {
  302.     DirAddPseudonymPB pb;
  303.     memset(&pb,sizeof(DirAddPseudonymPB),0);
  304.     
  305.     
  306.     pb.dsRefNum = this->GetDSRefNum();
  307.     pb.identity = gIdentity;
  308.  
  309.     long nilHint = 0;
  310.     pb.serverHint = *(AddrBlock*)&nilHint;
  311.     
  312.     pb.allowDuplicate =    allowDuplicate;  // will give dup error if record or pseudonym exists.
  313.  
  314.     pb.aRecord = *this;
  315.  
  316.     pb.pseudonymName =  (RString*)&_fRecordName;
  317.     pb.pseudonymType =  (RString*)&_fRecordType;
  318.     
  319.     return DirAddPseudonym((DirParamBlockPtr)&pb, false);
  320. }
  321.  
  322.  
  323. //-------------------------------------------------------------
  324. OSErr CRecordID::DeletePseudoNym()
  325. {
  326.     DirDeletePseudonymPB pb;
  327.     memset(&pb,sizeof(DirDeletePseudonymPB),0);
  328.     
  329.     
  330.     pb.dsRefNum = this->GetDSRefNum();
  331.     pb.identity = gIdentity;
  332.     
  333.     long nilHint = 0;
  334.     pb.serverHint = *(AddrBlock*)&nilHint;
  335.     
  336.     pb.aRecord = *this;
  337.  
  338.  
  339.     //    We assume that no grief is caused by the record name.
  340.  
  341.  
  342.     pb.pseudonymName =  (RString*)&_fRecordName;
  343.     pb.pseudonymType =  (RString*)&_fRecordType;
  344.     
  345.     return DirDeletePseudonym((DirParamBlockPtr)&pb, false);
  346. }
  347.  
  348.  
  349.  
  350. //-------------------------------------------------------------
  351. OSErr CRecordID::Delete()
  352. {
  353.  
  354.     
  355.     DirDeleteRecordPB        pb;
  356.     memset(&pb,sizeof(DirDeleteRecordPB),0);
  357.     
  358.     pb.dsRefNum = this->GetDSRefNum();
  359.     pb.identity = gIdentity;
  360.     
  361.     long nilHint = 0;
  362.     pb.serverHint = *(AddrBlock*)&nilHint;
  363.  
  364.     pb.aRecord = *this;
  365.     return DirDeleteRecord((DirParamBlockPtr)&pb, false);
  366. }
  367.  
  368.  
  369.  
  370.  
  371. //-------------------------------------------------------------
  372. OSErr CRecordID::Create(Boolean allowDuplicate)
  373. {
  374.  
  375.     
  376.     DirAddRecordPB    pb;
  377.     memset(&pb,sizeof(DirAddRecordPB),0);
  378.  
  379.     pb.dsRefNum = this->GetDSRefNum();
  380.     pb.identity = gIdentity;
  381.     
  382.     long nilHint = 0;
  383.     pb.serverHint = *(AddrBlock*)&nilHint;
  384.  
  385.     pb.aRecord = *this;
  386.     
  387.     pb.allowDuplicate = allowDuplicate;
  388.  
  389.     return DirAddRecord((DirParamBlockPtr)&pb, false);
  390.     
  391.  
  392. }
  393.  
  394.     
  395. //-------------------------------------------------------------
  396. OSErr CRecordID::CreateAsAlias(CRecordID& origRID, Boolean allowDuplicate,long /*backPtrFlags*/)
  397. {
  398.  
  399.         //    Create the alias record in catalog server.
  400.         
  401.         
  402.     DirAddAliasPB    pb;
  403.     memset(&pb,sizeof(DirAddAliasPB),0);
  404.     pb.dsRefNum = this->GetDSRefNum();
  405.     pb.identity = gIdentity;
  406.     
  407.     long nilHint = 0;
  408.     pb.serverHint = *(AddrBlock*)&nilHint;
  409.  
  410.     
  411.     pb.aRecord = *this;
  412.     pb.allowDuplicate = allowDuplicate;
  413.     OSErr osErr = DirAddAlias((DirParamBlockPtr)&pb, false);
  414.     
  415.  
  416.     if( osErr == 0 ) {
  417.     
  418.         PackedDSSpec** packedDSSpec = 0;
  419.  
  420.             //    Create the alias attribute.
  421.             
  422.         packedDSSpec = (PackedDSSpec**) origRID.PackDSSpec();
  423.         CAttribute aliasAttr( kAliasAttrTypeNum, typePackedDSSpec );
  424.         aliasAttr.fDataLength =(*packedDSSpec)->dataLength + sizeof(short);
  425.         aliasAttr.fBytes = (void *)*packedDSSpec;
  426.         
  427.         osErr =  aliasAttr.AddAttribute( *this ) ;
  428.  
  429. #ifdef ALIASBACKPOINTERS        
  430.         if( osErr == 0 ) {
  431.         
  432.         
  433.             //    Alias Backpointer
  434.             
  435.             
  436.             AliasBackpointer bp;
  437.             bp.cid = fCID;
  438.             bp.node = this->Node();
  439.             bp.flags = backPtrFlags;
  440.             CAttribute backpointerAttr( kAliasBackPointerTypeNum, typeBinary );
  441.             backpointerAttr.fDataLength = sizeof(AliasBackpointer);
  442.             backpointerAttr.fBytes = (void *)&bp;
  443.             osErr = backpointerAttr.AddAttribute( origRID );
  444.             
  445.             
  446.         }
  447.                     
  448. #endif    
  449.         if( osErr != 0 )
  450.             this->Delete();
  451.  
  452.         if( packedDSSpec != 0 )
  453.             DisposeHandle((Handle)packedDSSpec);
  454.  
  455.  
  456.     }
  457.     
  458.     return osErr;
  459.     
  460. }
  461.  
  462.  
  463.  
  464. //-------------------------------------------------------------
  465. PackedDSSpec** CRecordID::PackDSSpec()
  466. {
  467.  
  468.         // Caller is responsible for Disposing result.
  469.         
  470.         
  471.     DSSpec            aliasDSSpec;
  472.     aliasDSSpec.entitySpecifier    =    *this;
  473.     aliasDSSpec.extensionType        =    kOCEentnDSSpec;
  474.     aliasDSSpec.extensionSize        =    0;
  475.     aliasDSSpec.extensionValue        =    0;
  476.  
  477.     unsigned short packedDSSpecLen = OCEPackedDSSpecSize (&aliasDSSpec);
  478.     PackedDSSpec** packedDSSpec = (PackedDSSpec**) NewHandle(packedDSSpecLen);
  479.     
  480.     OCEPackDSSpec (&aliasDSSpec, *packedDSSpec, packedDSSpecLen);
  481.     
  482.     return packedDSSpec;
  483. }
  484.  
  485.  
  486.  
  487.